# wrapper for matrix multiplication
cpuMatMult <- function(A,B) {
    return(A%*%B)
}
